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PREFACE 


The Engineering Design Integration (EDIN) System consists of a 
series of computer programs used in the preliminary design of 
aerospace vehicles. This system is operational on the Univac 
1110 at NASA, Johnson Space Center. The programs in the EDIN 
System are used to determine aerodynamics, propulsion, mass 
properties, trajectory analysis, stability and' control, and 
cost. Due to the need for a structures program, APAS (Automated 
Predesign of Aircraft Structures) has been acquired and adapted 
to the Univac Exec 8 System. APAS, however, requires shear and 
bending moment diagrams and axial loads for the vehicle being 
designed. 

This requirement has resulted in two programs - LOADS and LDSTRS. 
The former does the actual calculations of shear, moment and 
axial load while the latter is used as a translator program, 
i.e., it takes data output by the other EDIN programs such as 
weights and c.g. programs and converts it to the proper format 
for input into the LOADS Program. The following report gives. a 
brief description of the LOADS Program. 
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LOADS - A COMPUTER PROGRAM FOR DETERMINING THE SHEAR, 
BENDING MOMENT AND AXIAL LOADS FOR FUSELAGE TYPE STRUCTURES. 

By: William E. Nolte - Sigma Corporation 

SUMMARY AND INTRODUCTION 

LOADS Program 


LOADS determines rigid body vehicle shears, bending moment and 
axial loads on a space vehicle due to aerodynamic loads and 
structure and propellant inertial loads. The program was written 
from an algorithm presented by E. F, Bruhn in part El. 7 of 
Analysis and Design o^ Mi ssile Structures . An example hand 
calculation is also presented in Bruhn 's book and was used to 
check LOADS. A brief description of the program and the equations 
used will be presented here, however, the reader should consult 
Bruhn 's book for a more detailed discussion of the algorithm. 

LOADS will be used in the EDIN System to provide inputs to a 
structural synthesis program, APAS, which requires vehicle 
shears, bending moments and axial loads. APAS v/ill then be 
used to size structural elements and calculate the total weight 
of the basic body structure. 

LOADS is operational on the Univac 1110, occupies 10505 core 
and typically takes less than one (1) second of CAU time to 
execute. All of the elements (symbolic, relocatable and 
absolute) of LOADS are on file ODIN-DBINIT2 . All three of 
these elements are called LOADS while the map element is called 
LOADSMAP. The data for the sample case presented in Bruhn 's 
book is in element LDS INP. The output generated from this 
data by LOADS varied from Bruhn 's output by less than one per 
cent. It should be noted at this point that Bruhn used a desk 
calculator which can not match the accuracy of a digital com- 
puter. Further verification of the accuracy of the program 
can be made by noting load values at the final station where 
it is known that shear, moment and axial load should be zero. 

LOADS printed out values of 0.05, 117.1, -0.25 for these three 
forces respectively. Bruhn 's calculations, however, produced 
values of -50., 103000., 1000. respectively. From these com- 
parisons it is concluded that the LOADS program is working 
properly and performing the necessary calculations. The final 
value for the moment, 117.1 in- lbs, may be considered approx- 
imately zero when compared to a maximum bending moment of 
133.1 X lO® in-lbs. 


The appendix contains a brief description and list of inputs 
for the translator program LDSTRS. 
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SHEAR FORCE 


The shear force at a station j is equal to the aerodynamic 
loads up to that station minus the lateral inertial loads due 
to the structure and propellant weights up to that station. 

i=l ^ 
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The weight of cantilevered j.tems is added in at the reaction 
station of that item. The lateral acceleration at any station 
i is given by 


= y + ^ ~ 0 

is the station location 

X is the vehicle c.g. location 

g is the force of gravity 

I • 

y is the lateral acceleration of the vehicle c.g. or the 
sum of all normal forces ^ divided by the 

total weight (W) of the vehicle. 


2 


. . n 

y 2 (ql. + qf.) 

i=l ^ ^ 

* * 2 

0 is the pitching acceleration in radius/second 

® m - ’‘i> 

2 

where I is the vehicle moment of inertia in slug~feet : 


“I’^i * * ‘"i * "cant. * ''!> 

r^ is the vehicle radius of gyration 

is the propellant radius of gyration 


- X) 


It should be noted that there is no radius of gyration term for 
cantilevered items. It is assumed that this term will be small 
compared to the other terms. The radius of gyration can be 
determined from the following figure: 
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BENDING MOMENT 


The moment at a station j is given by; 


M 




j 

+ S (ql.)A X. 
i=l ^ ^ 
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The first term accounts the area under the shear diagram assuming 
point load applications. The second term involving the pitching 
acceleration, accounts for a distributed non-uniform load. The 
third term adds the moment due to the aerodynamic forces on 
externally cantilevered items. The fourth term introduces a 
correction moment for internally cantilevered items. AX is the 
distance from the point where cantilevered item is attached to 
the tank wall to the C.G. location of that item. It should be 
noted that the second term neglects the contribution of canti- 
levered items. Once again, it has been assumed that the radius 
of gyration of cantilevered items will be small in comparison to 
the vehicle radii of gyration. 


AXIAL LOAD 


The axial load at a station j is the sum of the drag, thrust and 
inertial loads up to that station. Two formulas are used to 
determine axial load depending on whether or not the station 
passes through a solid propellant tank or a liquid propellant 
tank. This is due to the fact that solid propellant is attached 
to the tank walls and creates an incremental load while liquid 
propellant loads only +“he tank bottom. Thus, if the station j 
passes through a solid propellant tank, the axial load is given 
by: 


Pi fi + («i + + Vi> 


n, is the axial acceleration 
a 


"a *Ji ^ “canti * ''i> 


f^ are the tangential forces where “ “ 


THRUST 


It should be noted that the weight of the cantilevered items 
is added in at the reaction station. 


If the station j passes through a liquid fuel tank or no fuel 
tank at all, the axial load is given by: 


= j, ^ 


n. 
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Z 

i=l 
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and if the station j is at the bottom of a liquid propellant 
tank, the axial load becomes: 


^i 
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k. is the station at the bottom of the liquid propellant 
tank. 
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CANTILEVERED ITEMS 


Cantilevered items are structures which are attached to the 
vehicle and will create a bending moment on the vehicle under 
lateral acceleration. The point at which the item is attached 
to the vehicle is called the reaction station and it is assumed 
that the moment created by the item can be introduced at this 
point. 

Internally cantilevered items consist of engines which will 
introduce a correction moment at the reaction station. The 
moment arm, DELX, is 


and should be negative. X^. is the local! . of the reaction 
station and X^^ is the location of the engine c.g. 



INTERNALLY 

CANTILEVERED 

ENGINE 


Externally cantilevered items can be of two types - (1) fairings 
or (2) wing surfaces such as canards, wings, stabilizers, etc. 

The normal aerodynamic force acting on a fairing will create a 
moment which is added to the total moment at the vehicle reaction 
station; 
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-QLEX(I) 



The normal aerodynamic force acting on a wing will create a 
moment which is differenced from the total moment at the 
attach point. 




LOADS INPUT 




The following is a list of the input variables for program 
LOADS. All of the variables are dimensioned by 100 except for 
IBOT which is dimensioned 20 and N and NLASX which are not 
dimensioned. All data is read in by namelist NML. 

XNEW(I) - X station in inches. The first station must 
always equal zero ~ XNEW(1)=0.0. XNEW(I) is 
referenced from the nose of the vehicle. 



W(I) - Weight of the i^ section in lbs. This 

includes everything except fuel, oxidizer and 
payload weight. W(1)=0.0 always. 

'th 

V(I) - Weight of fuel or oxidizer in the i section 

in lbs. V(1)=0.0. 

WCANTI(I) - Weight of internally cantilevered item in 
lbs. This is input at the X station which 
locates the c.g. of the cantilevered item. 
WCANTI (1)=0.0. 


DELX(I) ■ - Distance between internally cantilevered item 

c.g. and item attach point in inches. This is 
input at the X station which locates the attach 
point of the item and is usually negative. 
DELX(1)=0.0. 

WCANTE(I) - Weight of externally cantilevered _ item in lbs. 

This is input at the X station which locates 
the c.g. of the cantilevered item. 
WCANTE(1)=0.0. 

EXDELX(I) -• Distance between externally cantilevered item 
c.g. and item attach point in inches. This is 
input at the X station which locates the 
attach point of the item and is usually nega- 
tive. EXDELX(1)“0.0, 
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N - Number of stations to end of fusel age- type 

structure. 

ISV(I) - Propellant radius of gyration indicator. 

J ISV(I)*0 - No propellant. 

ISV(I)»3 - Liquid Propellant, 

ISV(I)=4 - Solid Propellant. 

ISW(I) - Structure radius of gyration indicator. 

ISW(I)=1 - Solid tube. 

ISW(I)*2 - Hollow tube. 

ISW(I)»4 - Cylinder. 

IBOT(I) - Station number representing bottom of liquid 
fuel or oxidizer tank. 


QL(I) - Normal aerodynamic force on vehicle in lbs. 

QL(1)=0.0. 

QLEX(I) - Normal aerodynamic force on externally 
cantilevered item in lbs. QLEX(1)=0.0. 


DELQL(I) - Distance between normal force on externally 
cantilevered item and attach point of 
cantilevered item. This is input at the 
X station which locates the attach point 
of the cantilevered item. DELQL (1) =0 . 0 . 

F(I) - Tangential aerodynamic force. F(1)=0.0. 

R(I) - Radius in inches. R(1)=0.0. 

RO(I) - Internal radius for ISV(I)=3 in inches. 

R0(l)=0.0. 

NLASX - Total number of stations . 
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REFERENCE 'ANALYSIS AND DESIGN DF NIS:SLE STRUCTURES' 
BY E.F. BRUHN. PART El.?. 

DIMENSION X<100>» F<100>» VaCiO). W<100>» 

♦ QL <1 OCO . WCANTE <l 00> , UCANTI a 00) » ISW <1 00> , 

♦ I SV <1 0 0> » DELX < 1 0 0,1 f EXDELX < 1 0 0> » L < 10 O') » 

♦ Ri5SQ<l OO'i > R<100>» PHOSC!aOO>» R0<l00;i» 

♦ ACCLRT<100)> SHEARaOO>» MOMENT <100>» P<100;'» 

♦ I BOT -ra oi > s AVEM <; i o o;i » qlex a o o> » delql < i o o> . 

♦ XNEW (■ 1 0 0:i » SAVEME < 1 0 0> > T I TLE <5'i 
real MOMENT. IMNT. L 

NAMELIST/NML/ XNEU* W» V. WCRNTI. DELX. EXDELX. 


♦ 

♦ 


ISV. ISW. IBDT. DELQL. Q'LEX. 
R> RO. WCRNTE. NLASX. TITLE 


QL. 


PROGRAM LOADS DETERMINES SHEAR. BENDING MOMENT. AND 
AXIAL LOAD ON A ROCKET DUE TO AERODYNAMIC LOADS AND 
STRUCTURE AND PROPELLANT INERTIAL LOADS. DATA IS 
READ FROM NAMELIST NML WHICH WAS WRITTEN ON FILE 8 
BY THE TRANSLATOR PROGRAM. LDSTRS. OUTPUT IS WRITTEN 
ON FILE 14 FOP USE BY THE STRUCTURAL SYNTHESIS PRO- 
GRAM. APRS 

DATA G.--3£.£.^ 

DATA L 1 0 0 ♦ 0 . / 

DATA S A VEM 1 0 0^ 0 . / 

DATA SAVEME/ 1 0 0+-0 . / 

DATA WVSUM . SUM 1 . SUM2 . SUMS » SUM4 . SUMS . SUM6 . SUM?.^'8^0 . 

DATA FC . JP I . .JPE . JS I . USE . ,JSE£ . JSEL--7*-0 . 

DATA TERMl . TERMS. TERMS. TERM4. FSUM.,--5^0 . 

DATA TP 1 . TP2 . TPS . VSUM/4^0 . •••• 

REWIND 11 
REWIND 8 
READ >rS . NML> 

PRINT 1. TITLE 

1 FORMAT c:/.--// j 3 OX . ' ♦♦♦LOADS PROGRAM^^^-'' ? . SSX . 5A6 . 

DO 9 1=1.1 00 
X <I,':' =XNEW (ly 
9 CONTINUE 

DETERMINE C.G. LOCATION DF VEHICLE 
DO 10 1=1. NLASX 

SUMl = Wa> + WCANTECD + WCANTKD + V‘:;D 
WVSUM = SUMl + WVSUM 
SUMS = SUMl^XCD ♦ SUM2 
10 CONTINUE 

XEAR = SUM£.-'WVSUM 


DETERMINE RADIUS OF GYRATION ';:SQUARED> 
ISW- ISV = 1 '' SOLID TUBE 
£ '•• HOLLOW TUBE 
3 ''-LIQUID PROPELLANT 






4 ••••• 

CYLINDER 

SOLID 

prdpellant;;- 


DO 

£ 

0 I 

=£. N 








L-:: 

I'l 

= 

1 

X 

I-l) 







IF 

(I 

SW 

i;;« .EQ. 

1> 

F.'GS-Q 

;:n = 

C3, 

♦R 

(I )♦♦.■; + L.i:;i 

/‘1£. 

IF 

a 

SW ( 

n .EQ. 

£> 

R6SQ ' 

:;D = 

<6. 

♦R 

a ::'♦♦£ + L(I 

1 £ . 

IF 

(I 

SW ( 

D .EQ. 

4> 

RGSQ ' 

it 

<3. 

♦ (F 

? I > ♦♦£ + R 0 

I J* £ [^ + 

♦ 







••-I 

£. 
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:< ♦♦£ 




\ ^ 

; U 

I ^ 

I •• 


c 

c 


c 

c 

c 


c 

c 

c 


c 

c 

c 

c 

c 

c 

c 


IF<ISVa> .EQ. RHOSQ<I> ** L <I> . 

IFaSVa> .EQ. 4) RHDSQ<I> » <3. ♦ ^R <!'> ♦♦£ + 

^ / 12 . 

aO CQHTINUE 

CflLCULfiTE TOTfiL MDMEMT OF IMERTIFl IN SLUG FEET^^a 
DO 30 I«l.NLftSX 

^UM3 = ijJ I > ♦RGSQ ^ I) V <1^'' ♦’RHOSQ <I.> 

♦ ^ + WCftNTEa) + MCRNTKD + V <I) ) ♦<X <I> -XBRR:^ ♦>♦2 

♦ ■»■ SUMS 
30 CONTINUE 

INNT = 1 . / <144, ♦G) ♦SUN3 

CRLCULflTE PITCHING ftCCELERRTIDN IN RflDIRNS'-'SEC^^a 
DO 40 I = l>NLl=tSX 

SUM4 = ..•;QLa:>+QLEXa>>^"<XERR"X'::D> + suri4 
40 CONTINUE 

THETRD » 1 . / <ia. ♦INNT) ♦•SUM4 

LRTERRL flCCELERRTION RT C.G. RND RT RNY STRTIDN 

DO 50 I=l>NLflSX 
SUMS = QL':;D + QLEX<I> + SUNS 
50 CONTINUE 

Y D D = ' • 1 . •^ W V S U N ■> ♦ S U N 5 
DO 60 I = l!iNLflSX 

RCCLRT < I ) = YDD + <XBRR-X < I > > ♦THETRD--' (IE. ♦b :• 

60- CONTINUE 

^^.^^.♦♦^♦♦<::RLCULRTE VEHICLE SHERR^^^^>^^^^^ 

CANTILEVERED ITENS ARE ACCOUNTED FDR AT THEIR REACTION 
STATIONS. DELX RND EXDELX ARE GIVEN VALUES RT THE ATTACH 
POINTS. WCANTI AND WCANTE ARE GIVEN VALUES AT THE C.b. 

□F THE CANTILEVERED I TEN. 

DO 70 1 = 1 !«N 
SUM6 = OLCI) + SUM6 
IF ''DELX a) .HE. 0.) GO TO 72 
IF ''EXDELX <: I) .NE. 0.) GO TO 74 
SUM7 = <:UI '::i> ■+• V'rD>^ACCLAT<;D + SIJM7 
GO TO 76 
72 CONTINUE 

JSI = -JSI + 1 

iF'::jsi .gt. nlasx) go to so 

IFCWCANTI '::JSI> .EQ. O.!:* GO TO 72 
SR VEN I > = WC ANT I ''-JS I > ♦ACCL AT < JS I > 

IF >::EXDELX a> .NE. 0.> go TO 74 

SUN7 = I'Wi;:!) + V •' I > .) ♦ACCL AT <: I) + SAVEN'::i> + SUN7 
GO TO 76 

74 CONTINUE 

USE = JSE ♦ 1 

IFC-JSE .GT. NLASX) GO TO 80 
IF 'rWC ANTE <. JSE) .EQ. 0.) GO TO 74 
SA VENE I ) =WCRNTE ''-JSE) ♦RCCLRT JSE) 

S U M 7 = SR V E N E <; I > + W < I ) + V >' I ) ) ♦ A C C L A T I ) + 

♦ ” SAVEN'ri) + SUN7 

75 CONTINUE 

11 


o O O o O O O O O O O O O 1 .1 IJ I .* o o 


76 

70 

80 


JSEL«JSEL+l 

IFCJSEL .GT, HLfiSX'J GO TD 30 
IF'TQLEX'fJSEL) .EQ. 0.> GD TO 75 
SUM7 « :5UM7 - QLEX<JSEL> 

SHEFiPa’) « SUM6 - SUM7 

CONTINUE 

GD TD 85 

CONTINUE 

PRINT 82 » N> N» N» JSI» JSE» wISEL 


82 FORMAT 'T////'/!.5X» 'NUMBER OF CANTILEVERED WEIGHTS INPUT'*. 

NOT MATCH NUMBER OF MOMENT ARMS INPUT', 


♦ 

♦ 

♦ 

STOP 

85 CDNTINIJ 


/5X, 'DDES - 

/5X,'IF JSI EXCEEDS ',13,', CHECK INPUT FDR INTERNALLY', 

' CANT I LEVERED I TEMS ' , /SX , ' I F USE EXCEEDS ' ,13,', CHECK ' , 

' EXTERNALLY CANTILEVERED ITEMS' , /SX, ' IF JSEL EXCEEDS ', 
13,', CHECK LIFT FORCES <QLEX> ON EXTERNALLY ',/5X, 

' CANT I LEVERED I TEMS ' , /5X , ' JS I = ' , 1 4 , 5X , ' JSE= ' , 1 4 , 5X , ' JSEL= 

, I4> 


♦^^.^.^^^^♦CALCULATE VEHICLE BENDING MDMENT^^^»^^^^^ 


DO 90 1=2, N 

first moment term, TERMl, ACCOUNTS FDR THE AREA 
UNDER THE SHEAR DIAGRAM. 

TERMl = SHEAR '::i-l>^-<X<D-X':;i-l>> + TERMl 

THE SECOND MOMENT TERM, TERMS, ACCOUNTS FDR PITCHING ACCELERA 
TIDN. NOTE THAT THE CANTILEVERED ITEMS HAVE BEEN NEGLECTED. 

IT IS ASSUMED THAT THE RADIUS OF GYRATION OF THESE ITEMS WILL 
BE SMALL IN RELATION TD THE REST OF THE VEHICLE. 

TERMS = «!UKI> ♦RGSQ <I> " <I> ♦RHDSQ .;i> > ♦THETAD + TERMS 

TERM3 ACCOUNTS FDR AERO LOADS <QL> ON EXTERNALLY 
CANTILEVERED ITEMS ONLY.. 


IF<DELQLa> -EQ. 0.) GD TD 96 

92 CONTINUE 

USES = USES + 1 

IF.::JSES .GT. NLASX> GD TD 98 

IF ‘.'QLEX .::JSE£> .EQ. 0.> GD TD 92 

TERMS = QLEX CJSES) ♦DELQL ■:!> + TERMS 

GD TD 96 

98 CONTINUE 
PRINT 99, USES 
STOP 

99 FORMAT .:'.''.''/.^-.'',5X, 'ERROR IN LOADS PROGRAM IN ATTEMPT TD',/-5X, 

♦ -'CALCULATE TERMS MOMENT CONTRIBUTION', 


96 


90 


CONTINUE 

THE FOURTH MOMENT TERM, TERM4, ACCOUNTS 
CANTILEVERED ITEMS WHICH OVERHANG FROM 
STATIONS. 

TERM4 = SAVEM .;:D ♦DELX .::r> SA', CME ■: I ':' ♦EXDELX 
MOMENT ';:i> = TERMl - 1 CIS. ♦G!;. ♦TERMS +• TERM 


FDR 

THEIR REACTION 

<n + TERM4 
3 - TERM4 


CONTINUE 
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non 


♦♦♦♦♦♦♦♦♦♦CflLCULftTE fiXIftL 


DD no I«1»N 

Fsufi = Fa’> ■<” Fsuri 
no CDNirNUE 

RXflCCL * -FSUH/WVSUM 
TEMP » 0. 

I STEP « 1 

nn 120 i«i.M 

TPl « F<I-'' TPl 
IF (DEUX a> .ME. 0.) GD TO 112 
IFCEXriELXa) .ME. 0.> GO TO 114 
TP2 « U<D + TP2 
GO TO 115 
112 SOMTIMUE 

JPI « JPI 1 

IF UP I .GT. MLfiSX) GO TO 130 
IF<WCfiMTI <JPI> .EQ. 0.> 60 TO 112 
TEMP = WCftMTKJPI) 

IFCEXDELXCD .ME. 0.’) GO TO 114 
TP2 = liKI> •+■ TEMP + TP2 
TEMP = 0. 

GO TO 115 
114 COMTIMUE 

JPE = JPE + 1 

IF<JPE .GT. MLRSX> GO TO 130 
IF CMCRMTE '.'JPE) .EQ. 0.) GO TO 114 
TP2 = W'.I> + UlCRMTE 'UPE> + TEMP + TP2 
TEMP = .. 


GO TO 115 

130 COMTIMUE 

PRIMT 131 » JPI » JPE 

131 FORMPT ''/x-vw, 5X> ' ERROR 

♦ ^'5Xi. "RXIRL LORD. 


IM LORDS PPOGRRM WHILE CRLCULRTIMi 
JPI = '' 5 I4> '■ .JPE=-‘!'I4) 


STOP 

115 COMTIMUE 

IF ass-" >::i> -3) 122!'124»126 


- MO PROPELLRMT IM THIS SECTIOM 
0 LIQUID PROPELLRMT 
+ SOLID PROPELLRMT 


C 

126 COMTIMUE 

TP3 = Va> + TP3 
GO TO 122 

124 COMTIMUE 

IF a .EQ. IBOTCISTEP)) GO TO 125 
VSUM a V>::i) + VSUM 
GO TO 122 

125 COMTIMUE 

VSUM = Va> + VSUM 
TP3 = VSUM + TP3 
VSUM = 0. 

I STEP = I STEP + 1 
122 CONTINUE 

Ri:'I> = TPl + RXRCCL^TP2 + RXRCCL^TPJ 
120 COMTIMUE 


c 

c PRINT RESULTS 

C 

PRINT 1000 

lOnp FDRNPT<'8X» ''STRTIDN' j 9X* 
♦ INCHES' >11X» 

DD 250 I=l»N 


' SHERR ' » 6X f ' riQMENT *' j 7X . ' RX I RL 
' LBS ' » 7X > ' I N-LBS ' » 1 1 X > ' LBS ' * 


1050 

250 


J«I-1 

p «~i .♦PCI) 

WRITE Cll) X<I> »SHERR CD 'MOMENT CD f PCI) 

PRINT 1050»XCI)» SHERRCI)' MOMENT CD' PCD' J _ 

FORMRT CSX n C 1 1 . 4 » 5X >G11.4» 1X>G11.4» 1X'G11.4» D. »Glc;.4»-. 

CONTINUE 

ENDFILE 11 

REWIND 31 

CRLL RDDREL C 1 4 y 1 HX » 1 0 0 » X) 

CRLL RDDREL C14»5HSHERR' lOO'SHERR) 

CRLL RDDREL C 1 4, 6HM0MENT' 1 00> MOMENT^ 

CRLL RDDREL C 1 4» 1 HP » 1 0 0 ? P) 

END 


LORD'/-' 


X» 13) 


14 


APPENDIX 


othlJ ^ translator program which takes data from 

arranges it in proper form to be input 
into the LOADS Program. Stations are synthesized accordino^to 
allowable distance between any two adjacent stations 
which IS an input. The nose of the vehicle is assumed to be 
llipse with structural (and pi^opellant) weight distributed 
according to the integral of the "ellipse. For the rest of the 

accordiArr®^^'^®^^^^^ propellant weights are distributed ^ 
section length and radius. Moment arms are 
calculated for cantilevered items and are output at the station 
which represents the attach point for the item? station 
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LDSTRS INPUT 


LDSTRS is a program which takes data from the data base and 
arranges in the proper form to be input into the LOADS program. 
LDSTRS also synthesizes stations so that a smoother loads 
analysis will be produced. Data is read into program LDSTRS 
by namelist $IN. All stations are referenced from the nose of 
the vehicle. 

ENDPY - Station at end of payload bay in inches. 

WPYLD - Weight of payload in pounds . 

BGNPY - Station at beginning of payload bay in inches 

EXCTCG(I) - C.G. location of externally cantilevered item 
Up to 10 externally cantilevered items may be 
input. 

EXCTWT(I) - Weight of externally cantilevered item. 

Dimensioned by 10, the weight of i^h item 
must correspond to EXCTCG(I). 

C.G. location of internally cantilevered 
item. Up to 10 items may be input. 

+* Vi 

Weight of the i internally cantilevered 
item. 

EXCTAT(I) - Location of attach point of externally 
cantilevered item. 

INCTAT(I) - Location of attach point of internally 
cantilevered item. 

WTOT(I) - Total structural weight of the i stage less 
the weight of cantilevered items. Up to 4 
stages may be input with WTOT(l) 

= weight of last stage, WTOT(2)= weight of 
next to last stage, etc. 

ENDSTG(I) - Station at end of stage. ENDSTG(1)=0.0, 
ENDSTG(2)= end of final stage, etc. 

th. 

VLOX(I) “ Weight of LOX in i tank. Up to 10 tanks 
may be input. 

- Weight of liquid propellant in i^^ tank. Up 
to 10 tanks may be input. 


INCTCG(I) - 
INCTWT(I) - 


VRP (I) 



WLXST(I) 

WRPST(I) 

BGNLX(I) 

ENDLX(I) 
BGNRP (I) 

ENDRP(I) 

VSLD(I) 

WVSST (I) 
VSRADI (I) 
BGNVS ( I ) 

END VS (I) 


- Weight Of i^^ LOX tank structure. 


- weight of ith propellant tank structure. 

” tank!°" denotes beginning of i^^ lox 

Station which denotes end of i^^ lox tank. 

■ beginning of i^h ^guid 

Weight of solid propellant in i^^ tank Ud 
to 10 tanks may be input. * ^ 

- Weight of ibb 301^3 propellant tank structure. 

- internally radius of i^h 3^^^^ propellant tank. 

■ pr%%1?ant'?ank“°""= eolid 


RADGYR (I) 


Radius of gyration indicator, 
oe input with each RADGYR(i) 
XRAD(I). 


Up to 10 may 
corresponding to 


XRAD(I) 


gyration 


PAYLOAD 
BAY / 

/ 


XRAD(D — 


XRAD(2)^' 


ENDPY 

V 


XRAD(3) 
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RAD (I) 

QLEXF(I) 

XQLEXF(I) 

QLP(I) 

XQL(I) 

FF(I) 

XF (I) 

XMAX 


- Radius at station. RAD (1) =0.0, 
RAD(I)=XPAD(I) . 

- Normal aerodynamic force on externally 
cantilevered item. 

- Location of QLEXF(I). 

■■ Normal aerodynamic force on vehicle. Up to 
20 may be input. 

- Location of QL(I). 

- Tangential aerodynamic force. Up to 10 may 
be input. 

- Location of FF(I). 

- Maximiim allowable distance between any two 
adjacent stations. 
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